Fix browse-url (remove debugging leftover).

* lisp/net/browse-url.el (browse-url): Fix "No suitable browser for
URL" always popping up.

diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index b34665358ca507147d5a7ee06662740dbbf44f35..3d55ee554f10936c9c5091be0b8904f2bf2da858 100644 (file)
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -864,7 +864,7 @@ If ARGS are omitted, the default is to pass
     ;; which may not even exist any more.
     (if (stringp (frame-parameter nil 'display))
         (setenv "DISPLAY" (frame-parameter nil 'display)))
-    (if (functionp nil)
+    (if (functionp function)
         (apply function url args)
       (error "No suitable browser for URL %s" url))))